5 PRINT"[147]"
10 POKE53280,14:POKE646,14:POKE53281,6
20 A=A+1
30 IFA=1THENLOAD"LAND CODE",8,1
40 IFA=2THENLOAD"LAND DATA",8,1
50 IFA=3THENSYS49152